WSH上で、COM版BlatJを使用して電子メール送信を行うサンプルソース【▲→川俣晶の縁側→ソフトウェア→技術雑記】

　標題の通りのサンプルソースです。

　下記内容を拡張子".vbs"のテキストファイル(シフトJIS)として保存し、コマンドラインからcscript (ファイル名)として実行できます。

　XXXXの部分は適切な電子メールアドレスやSMTPサーバ名に書き換える必要があります。

Set comblat = CreateObject("blat.send.1")

comblat.From = "XXXXXXX@XXXXXX.jp"

comblat.To = "XXXXXX@XXXXXX.jp"

comblat.subject = "COMBLAT TEST"

comblat.body = "これがメール本文です。"

comblat.Server = "XXXXXX.jp"

comblat.send

If comblat.IsError Then

WScript.Echo "エラーが発生しました。"

WScript.Echo comblat.errorMessage

End If

WScript.Echo "ログ:"

WScript.Echo comblat.Log